(fast-lock-cache-name): Fix test for `windows-nt'.

diff --git a/lisp/fast-lock.el b/lisp/fast-lock.el
index 859ec239c429621502a92fc7300bb834355d16c3..fca1188789fbc5ee4fb53053f365f703bbdbca18 100644 (file)
--- a/lisp/fast-lock.el
+++ b/lisp/fast-lock.el
@@ -552,7 +552,7 @@ See `fast-lock-cache-directory'."
       (concat buffer-file-name ".flc")
     (let* ((bufile (expand-file-name buffer-file-truename))
           (chars-alist
-           (if (memq system-type '(emx windowsnt))
+           (if (memq system-type '(emx windows-nt))
                '((?/ . (?#)) (?# . (?# ?#)) (?: . (?\;)) (?\; . (?\; ?\;)))
              '((?/ . (?#)) (?# . (?# ?#)))))
           (mapchars